val get_dims : Sdlvideo.surface -> int * int
val search_altitude : string -> int * int * int -> string
val make_vertices :
  Sdlvideo.surface -> int -> string -> (float * float * float) array
val make_faces :
  Sdlvideo.surface ->
  int -> 'a array -> ((int * int * int) * (int * int * int)) array
val write_obj :
  (float * float * float) array ->
  ((int * int * int) * (int * int * int)) array -> string -> unit
val decompose_v : string -> float * float * float
val decompose_f : string -> int * int * int
val read_obj :
  string -> (float * float * float) array * (int * int * int) list
val objectize : Sdlvideo.surface -> int -> string -> string -> unit
